Raymond Toy pushed to branch issue-240-add-hashtable-set-exclusive-or at cmucl / cmucl

Commits:

1 changed file:

Changes:

  • src/code/list.lisp
    ... ... @@ -842,7 +842,7 @@
    842 842
     ;;; to the cdr, and "conses" the 1st elt of source to destination.
    
    843 843
     ;;;
    
    844 844
     (defmacro steve-splice (source destination)
    
    845
    -  `(let ((temp ,source))g
    
    845
    +  `(let ((temp ,source))
    
    846 846
          (setf ,source (cdr ,source)
    
    847 847
     	   (cdr temp) ,destination
    
    848 848
     	   ,destination temp)))