Raymond Toy pushed to branch issue-240-set-diff-with-hash-table at cmucl / cmucl
Commits:
-
c3aa0678
by Raymond Toy at 2023-07-27T07:31:17-07:00
1 changed file:
Changes:
| ... | ... | @@ -855,7 +855,7 @@ |
| 855 | 855 | (cond (hashtable
|
| 856 | 856 | ;; list2 was placed in hash table.
|
| 857 | 857 | (let ((res nil))
|
| 858 | - (doli st (item list1)
|
|
| 858 | + (dolist (item list1)
|
|
| 859 | 859 | (unless (nth-value 1 (gethash (apply-key key item) hashtable))
|
| 860 | 860 | (push item res)))
|
| 861 | 861 | res))
|