Commit 67de6c46 authored by Heiko Becker's avatar Heiko Becker

Update CakeML to the latest compiling state

parent 2611a9f2
......@@ -165,11 +165,9 @@ fun add_unevaluated_function (t:term) :unit =
let
val add_t = "val _ = FloverTactics.eval_funs :=``" ^ term_to_string t ^ "`` :: (!FloverTactics.eval_funs);"
val _ = adjoin_to_theory
{ sig_ps =
SOME (fn ppstrm => ()),
{ sig_ps = NONE,
struct_ps =
SOME (fn ppstrm =>
PP.add_string ppstrm add_t)};
SOME (fn _ => PP.add_string add_t)};
in
eval_funs := t :: (!eval_funs)
end;
......
Subproject commit 120c3f18b89f91ef6697c1f29d2025cbe2369b9a
Subproject commit ffce1e98edd43af5f177e1c1cdb612e8c4ac7f29
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment