Raymond Toy pushed to branch issue-240-set-diff-with-hash-table at cmucl / cmucl

Commits:

1 changed file:

Changes:

  • src/code/list.lisp
    ... ... @@ -883,7 +883,8 @@
    883 883
     	     (maphash #'(lambda (key value)
    
    884 884
     			  (declare (ignore key))
    
    885 885
     			  (setq result (nconc result value)))
    
    886
    -		      hashtable))))))
    
    886
    +		      hashtable)
    
    887
    +	     result)))))
    
    887 888
     
    
    888 889
     
    
    889 890
     (defun nset-difference (list1 list2 &key key