Mercurial > urweb
comparison src/compiler.sig @ 1725:7b9775d4a8ce
'linker' .urp directive
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Sun, 22 Apr 2012 10:57:22 -0400 |
parents | 3cfc79f92db7 |
children | c414850f206f |
comparison
equal
deleted
inserted
replaced
1724:125f9b01fbf1 | 1725:7b9775d4a8ce |
---|---|
38 debug : bool, | 38 debug : bool, |
39 profile : bool, | 39 profile : bool, |
40 timeout : int, | 40 timeout : int, |
41 ffi : string list, | 41 ffi : string list, |
42 link : string list, | 42 link : string list, |
43 linker : string option, | |
43 headers : string list, | 44 headers : string list, |
44 scripts : string list, | 45 scripts : string list, |
45 clientToServer : Settings.ffi list, | 46 clientToServer : Settings.ffi list, |
46 effectful : Settings.ffi list, | 47 effectful : Settings.ffi list, |
47 benignEffectful : Settings.ffi list, | 48 benignEffectful : Settings.ffi list, |
61 minHeap : int | 62 minHeap : int |
62 } | 63 } |
63 val compile : string -> bool | 64 val compile : string -> bool |
64 val compiler : string -> unit | 65 val compiler : string -> unit |
65 val compileC : {cname : string, oname : string, ename : string, libs : string, | 66 val compileC : {cname : string, oname : string, ename : string, libs : string, |
66 profile : bool, debug : bool, link : string list} -> bool | 67 profile : bool, debug : bool, linker : string option, link : string list} -> bool |
67 | 68 |
68 val beforeC : (unit -> unit) ref | 69 val beforeC : (unit -> unit) ref |
69 (* This function is called before beginning C compilation. | 70 (* This function is called before beginning C compilation. |
70 * The current use is for MLton to compact its heap here, to avoid hogging | 71 * The current use is for MLton to compact its heap here, to avoid hogging |
71 * space after all the interesting ML code is done. *) | 72 * space after all the interesting ML code is done. *) |