diff options
Diffstat (limited to 'src/compiler.sml')
-rw-r--r-- | src/compiler.sml | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/compiler.sml b/src/compiler.sml index 36a1b03f..de10d8c8 100644 --- a/src/compiler.sml +++ b/src/compiler.sml @@ -1438,19 +1438,19 @@ val sigcheck = { val toSigcheck = transform sigcheck "sigcheck" o toSidecheck -val sqlcache = { - func = (fn file => (Sql.go file; file)), +val sqlCache = { + func = SqlCache.go, print = MonoPrint.p_file MonoEnv.empty } -val toSqlcache = transform sqlcache "sqlcache" o toSigcheck +val toSqlCache = transform sqlCache "sqlCache" o toSigcheck val cjrize = { func = Cjrize.cjrize, print = CjrPrint.p_file CjrEnv.empty } -val toCjrize = transform cjrize "cjrize" o toSqlcache +val toCjrize = transform cjrize "cjrize" o toSqlCache val prepare = { func = Prepare.prepare, |