comparison src/settings.sig @ 1164:8679ba87cf3c

sigfile directive
author Adam Chlipala <adamc@hcoop.net>
date Thu, 11 Feb 2010 09:10:01 -0500
parents 01b6c7144a44
children 7a2a7a8f9cab
comparison
equal deleted inserted replaced
1163:6c507826fae9 1164:8679ba87cf3c
94 type protocol = { 94 type protocol = {
95 name : string, (* Call it this on the command line *) 95 name : string, (* Call it this on the command line *)
96 compile : string, (* Pass these `gcc -c' arguments *) 96 compile : string, (* Pass these `gcc -c' arguments *)
97 linkStatic : string, (* Pass these static linker arguments *) 97 linkStatic : string, (* Pass these static linker arguments *)
98 linkDynamic : string,(* Pass these dynamic linker arguments *) 98 linkDynamic : string,(* Pass these dynamic linker arguments *)
99 persistent : bool (* Multiple requests per process? *) 99 persistent : bool, (* Multiple requests per process? *)
100 code : unit -> Print.PD.pp_desc (* Extra code to include in C files *)
100 } 101 }
101 val addProtocol : protocol -> unit 102 val addProtocol : protocol -> unit
102 val setProtocol : string -> unit 103 val setProtocol : string -> unit
103 val currentProtocol : unit -> protocol 104 val currentProtocol : unit -> protocol
104 105
188 val getStaticLinking : unit -> bool 189 val getStaticLinking : unit -> bool
189 190
190 val setDeadlines : bool -> unit 191 val setDeadlines : bool -> unit
191 val getDeadlines : unit -> bool 192 val getDeadlines : unit -> bool
192 193
194 val setSigFile : string option -> unit
195 val getSigFile : unit -> string option
196
193 end 197 end