equal
deleted
inserted
replaced
151 |
151 |
152 (* interface *) |
152 (* interface *) |
153 |
153 |
154 fun translate_config ctxt = { |
154 fun translate_config ctxt = { |
155 logic = choose_logic ctxt, |
155 logic = choose_logic ctxt, |
156 has_datatypes = false, |
156 fp_kinds = [], |
157 serialize = serialize} |
157 serialize = serialize} |
158 |
158 |
159 val _ = Theory.setup (Context.theory_map |
159 val _ = Theory.setup (Context.theory_map |
160 (setup_builtins #> |
160 (setup_builtins #> |
161 SMT_Translate.add_config (smtlibC, translate_config))) |
161 SMT_Translate.add_config (smtlibC, translate_config))) |