diff options
| author | aarne <aarne@cs.chalmers.se> | 2006-12-19 23:34:36 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2006-12-19 23:34:36 +0000 |
| commit | 0bf909b0fd50a29f9d52a82f50c12af0c6abbc9e (patch) | |
| tree | 9eb74ff00aad09321cec312d4ef0662937342dcd /src/GF/Compile/Compile.hs | |
| parent | 2f68128323462c0488dfc98c09dbc615c1ca9cf1 (diff) | |
overload resolution with value type, for experiment
Diffstat (limited to 'src/GF/Compile/Compile.hs')
| -rw-r--r-- | src/GF/Compile/Compile.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/Compile/Compile.hs b/src/GF/Compile/Compile.hs index 13d2129b7..0e59b1c9d 100644 --- a/src/GF/Compile/Compile.hs +++ b/src/GF/Compile/Compile.hs @@ -281,7 +281,7 @@ compileSourceModule opts env@(k,gr,can,eenv) mo@(i,mi) = do (mo3:_,warnings) <- putpp " type checking" $ ioeErr $ showCheckModule mos mo2 if null warnings then return () else putp warnings $ return () - (k',mo3r:_) <- ioeErr $ refreshModule (k,mos) mo3 + (k',mo3r:_) <- putpp " refreshing " $ ioeErr $ refreshModule (k,mos) mo3 (mo4,eenv') <- ---- if oElem "check_only" opts |