Skip to content
Snippets Groups Projects
Forked from cmucl / cmucl
Source project has a limited visibility.
  • gerd's avatar
    447bdd8a
    (funcall (compile nil '(lambda () · 447bdd8a
    gerd authored
    	   (declare (optimize (safety 3) (speed 0) (debug 0)))
    	   (ash 6916244 (min 42 -185236061640)))))
    	 => -185236061640 is not a (or fixnum null)
    
    	* src/compiler/generic/vm-type.lisp (ash-index): Is integer,
    	not fixnum.
    447bdd8a
    History
    (funcall (compile nil '(lambda ()
    gerd authored
    	   (declare (optimize (safety 3) (speed 0) (debug 0)))
    	   (ash 6916244 (min 42 -185236061640)))))
    	 => -185236061640 is not a (or fixnum null)
    
    	* src/compiler/generic/vm-type.lisp (ash-index): Is integer,
    	not fixnum.