Commit 725550da authored by Andrei Paskevich's avatar Andrei Paskevich
Browse files

a small fix in the printer for SMTv2

thanks to Johannes Kanig
parent 5cabcb2a
......@@ -230,7 +230,7 @@ let print_param_decl info fmt ls =
let print_logic_decl info fmt (ls,def) =
if Mid.mem ls.ls_name info.info_syn then () else
let vsl,expr = Decl.open_ls_defn def in
fprintf fmt "@[<hov 2>(declare-fun %a (%a) %a %a)@]@\n@\n"
fprintf fmt "@[<hov 2>(define-fun %a (%a) %a %a)@]@\n@\n"
print_ident ls.ls_name
(print_var_list info) vsl
(print_type_value info) ls.ls_value
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