diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-09-02 13:44:54 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-09-02 13:44:54 -0400 |
| commit | 3b770e100b11cbcfc19af6f810962975e9221d9f (patch) | |
| tree | 118fc415c7d76078537557985afc4ed1d878918b /src/compiler.sig | |
| parent | 4d83cf46590e7c48581612fd9fe6218b896b89b8 (diff) | |
Generating SQL files
Diffstat (limited to 'src/compiler.sig')
| -rw-r--r-- | src/compiler.sig | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/compiler.sig b/src/compiler.sig index a58784a9..30fef941 100644 --- a/src/compiler.sig +++ b/src/compiler.sig @@ -31,7 +31,10 @@ signature COMPILER = sig type job = { database : string option, - sources : string list + sources : string list, + exe : string, + sql : string option, + debug : bool } val compile : string -> unit val compileC : {cname : string, oname : string, ename : string} -> unit @@ -65,6 +68,7 @@ signature COMPILER = sig val mono_reduce : (Mono.file, Mono.file) phase val mono_shake : (Mono.file, Mono.file) phase val cjrize : (Mono.file, Cjr.file) phase + val sqlify : (Mono.file, Cjr.file) phase val toParseJob : (string, job) transform val toParse : (string, Source.file) transform @@ -83,5 +87,6 @@ signature COMPILER = sig val toMono_shake : (string, Mono.file) transform val toMono_opt2 : (string, Mono.file) transform val toCjrize : (string, Cjr.file) transform + val toSqlify : (string, Cjr.file) transform end |