X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=src%2Feval.mli;h=82bab71a5f2719017f55829bf23576e6a5209e33;hb=deb7edaccefe379139818e8b241844b9a0571651;hp=2a8660123d68a529ca2f4863ad1f44544fa7d107;hpb=a48b05d35f0646322e8178ff10f8ed7af3e739aa;p=goals.git

diff --git a/src/eval.mli b/src/eval.mli
index 2a86601..82bab71 100644
--- a/src/eval.mli
+++ b/src/eval.mli
@@ -29,7 +29,7 @@ val substitute : Ast.env -> Ast.loc -> Ast.substs -> string
 
 (** Run a code section.  Returns the exit code and the output printed
     by the script.  Raises [Failure _] on error. *)
-val run_code : ?quiet:bool -> Ast.env -> Ast.loc -> Ast.substs -> int * string
+val run_code : Ast.env -> Ast.loc -> Ast.code -> int * string
 
 (** Evaluate a goal argument.  This substitutes any variables found,
     and recursively calls functions. *)