Raymond Toy pushed to branch issue-240-clean-up-hashtable-impl at cmucl / cmucl

Commits:

1 changed file:

Changes:

  • src/code/list.lisp
    ... ... @@ -828,7 +828,7 @@
    828 828
       
    
    829 829
     
    
    830 830
     (defun intersection (list1 list2 &key key
    
    831
    -			           (test #'eql testp) (test-not nil notp))
    
    831
    +			   (test #'eql testp) (test-not nil notp))
    
    832 832
       "Returns the intersection of list1 and list2."
    
    833 833
       (declare (inline member))
    
    834 834
       (if (and testp notp)