diff options
| author |  Adam Chlipala <adam@chlipala.net> | 2015-12-20 14:18:52 -0500 |
|---|---|---|
| committer | Adam Chlipala <adam@chlipala.net> | 2015-12-20 14:18:52 -0500 |
| commit | 68b355524cc20056d8c059138be225aaa9762e0a (patch) | |
| tree | 6c9a407a965d2cdd5f30815cc3e642a6f9b3d451 /src/main.mlton.sml | |
| parent | 7bf4f9f063dcdc9fc50ad6ac6143b113535b68f0 (diff) | |
| parent | 0271786bacdf9c12a142367a479b24ba111ebd17 (diff) | |
Merge Sqlcache
Diffstat (limited to 'src/main.mlton.sml')
| -rw-r--r-- | src/main.mlton.sml | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/main.mlton.sml b/src/main.mlton.sml index 7197babf..67732b58 100644 --- a/src/main.mlton.sml +++ b/src/main.mlton.sml @@ -159,6 +159,12 @@ fun oneRun args = | "-iflow" :: rest => (Compiler.doIflow := true; doArgs rest) + | "-sqlcache" :: rest => + (Settings.setSqlcache true; + doArgs rest) + | "-heuristic" :: h :: rest => + (Sqlcache.setHeuristic h; + doArgs rest) | "-moduleOf" :: fname :: _ => (print (Compiler.moduleOf fname ^ "\n"); raise Code OS.Process.success) |