diff options
| author | Son Ho | 2023-06-02 16:10:20 +0200 |
|---|---|---|
| committer | Son HO | 2023-06-04 21:54:38 +0200 |
| commit | 54afbf3a8b71ee729641ee3024d19aaf8fa92a67 (patch) | |
| tree | a014bdb321be1ada84a8687e38bd17c487d68889 /backends/hol4/divDefNoFixLib.sml | |
| parent | 435d75174a12a47da84537cc7c9730a0eccf6d1f (diff) | |
Start setting up the Nix derivation for HOL4
Diffstat (limited to 'backends/hol4/divDefNoFixLib.sml')
| -rw-r--r-- | backends/hol4/divDefNoFixLib.sml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/backends/hol4/divDefNoFixLib.sml b/backends/hol4/divDefNoFixLib.sml index f7b9763d..85a1b1a8 100644 --- a/backends/hol4/divDefNoFixLib.sml +++ b/backends/hol4/divDefNoFixLib.sml @@ -206,7 +206,7 @@ fun get_smallest_unique_id_for_names (names : string list) : string = handle HOL_ERR _ => false val _ = while !continue do ( - let val _ = (continue := not (forall name_is_ok names)) in + let val _ = (continue := not (all name_is_ok names)) in if !continue then incr_i () else () end ) in |