Remove dead code.

[whenjobs.git] / lib / whenfile.mli

diff --git a/lib/whenfile.mli b/lib/whenfile.mli
index 345c758..54ee52d 100644 (file)
--- a/lib/whenfile.mli
+++ b/lib/whenfile.mli
@@ -18,14 +18,14 @@
 
 (** This module is used when compiling whenjobs input files. *)
 
-val init : unit -> unit
-(** "Initialize" the module.  Clear the list of jobs and other
-    internal variables so we are ready to parse a new file. *)
+val init : Whenstate.t -> unit
+(** "Initialize" the module.  Pass in the initial state, ready for
+    parsing a new file. *)
 
-val get_jobs : unit -> Whenutils.job list
-(** Get the jobs added since {!init} was called. *)
+val get_state : unit -> Whenstate.t
+(** Return the updated state.  Call this after parsing the file. *)
 
-val add_when_job : Camlp4.PreCast.Loc.t -> string -> Camlp4.PreCast.Ast.expr -> Whenutils.shell_script -> unit
+val add_when_job : Camlp4.PreCast.Loc.t -> string -> Camlp4.PreCast.Ast.expr -> Whenexpr.shell_script -> unit
 (** When a 'when' macro appears as a toplevel statement in an
     input file, it causes this function to be called.
 
@@ -37,7 +37,7 @@ val add_when_job : Camlp4.PreCast.Loc.t -> string -> Camlp4.PreCast.Ast.expr ->
 
     [sh] is the shell script fragment (basically location + a big string). *)
 
-val add_every_job : Camlp4.PreCast.Loc.t -> string -> Whenutils.periodexpr -> Whenutils.shell_script -> unit
+val add_every_job : Camlp4.PreCast.Loc.t -> string -> Whenexpr.periodexpr -> Whenexpr.shell_script -> unit
 (** When an 'every' macro appears as a toplevel statement in an
     input file, it causes this function to be called.