diff options
Diffstat (limited to 'backends/hol4/divDefLib.sml')
-rw-r--r-- | backends/hol4/divDefLib.sml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/backends/hol4/divDefLib.sml b/backends/hol4/divDefLib.sml index 1e95b6c5..c9d8806d 100644 --- a/backends/hol4/divDefLib.sml +++ b/backends/hol4/divDefLib.sml @@ -904,6 +904,8 @@ fun DefineDiv (def_qt : term quotation) = (we still do it: it doesn't cost much). *) val _ = app delete_binding thm_names val _ = map store_definition (zip thm_names def_eqs) + (* Also save the custom unfoldings, for evaluation (unit tests) *) + val _ = evalLib.add_unfold_thms thm_names in def_eqs end |