diff options
| author | Son Ho | 2023-05-22 15:23:48 +0200 |
|---|---|---|
| committer | Son HO | 2023-06-04 21:54:38 +0200 |
| commit | 1f0e5b3cb80e9334b07bf4b074c01150f4abd49d (patch) | |
| tree | e66c708351b518bcda12bfa28ef3249eb3714cdb /backends/hol4/divDefLib.sml | |
| parent | 77d775ecea850576b24d097b402571889faa2a15 (diff) | |
Make the unfolding theorems collection from evalLib persistent
Diffstat (limited to '')
| -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 |