summaryrefslogtreecommitdiff
path: root/src/compiler/GFI.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/compiler/GFI.hs')
-rw-r--r--src/compiler/GFI.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/compiler/GFI.hs b/src/compiler/GFI.hs
index 8fdc97ecc..070a95384 100644
--- a/src/compiler/GFI.hs
+++ b/src/compiler/GFI.hs
@@ -332,7 +332,7 @@ checkComputeTerm' new sgr t = do
t1 <- if new
then return (CN.normalForm (CN.resourceValues sgr) (L NoLoc identW) t)
else computeConcrete sgr t
- checkPredefError sgr t1
+ checkPredefError t1
fetchCommand :: GFEnv -> IO String
fetchCommand gfenv = do