diff options
Diffstat (limited to 'src/exper/Evaluate.hs')
| -rw-r--r-- | src/exper/Evaluate.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/exper/Evaluate.hs b/src/exper/Evaluate.hs index 7c5fb4b6a..413c82402 100644 --- a/src/exper/Evaluate.hs +++ b/src/exper/Evaluate.hs @@ -386,7 +386,7 @@ evalConcrete gr mo = mapMTree evaldef mo where Bad s -> raise s noExpand p = errVal False $ do - mo <- lookupModMod gr p + mo <- lookupModule gr p return $ case getOptVal (iOpts (flags mo)) useOptimizer of Just "noexpand" -> True _ -> False |