Mercurial > urweb

diff src/compiler.sig @ 274:e4baf03a3a64

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Generating SQL files
author Adam Chlipala <adamc@hcoop.net>
date Tue, 02 Sep 2008 13:44:54 -0400
parents b9b02613c0c2
children 0236d9412ad2
line wrap: on
line diff
--- a/src/compiler.sig	Tue Sep 02 13:09:54 2008 -0400
+++ b/src/compiler.sig	Tue Sep 02 13:44:54 2008 -0400
@@ -31,7 +31,10 @@
 
     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 @@
     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 @@
     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