Update of /project/movitz/cvsroot/movitz In directory common-lisp.net:/tmp/cvs-serv19683
Modified Files: multiboot.lisp Log Message: Patch from Eric Marsden.
Date: Wed Jul 28 07:23:37 2004 Author: ffjeld
Index: movitz/multiboot.lisp diff -u movitz/multiboot.lisp:1.4 movitz/multiboot.lisp:1.5 --- movitz/multiboot.lisp:1.4 Thu Mar 25 17:42:45 2004 +++ movitz/multiboot.lisp Wed Jul 28 07:23:37 2004 @@ -10,7 +10,7 @@ ;;;; Author: Frode Vatvedt Fjeld frodef@acm.org ;;;; Created at: Wed Jun 12 12:14:12 2002 ;;;; -;;;; $Id: multiboot.lisp,v 1.4 2004/03/26 01:42:45 ffjeld Exp $ +;;;; $Id: multiboot.lisp,v 1.5 2004/07/28 14:23:37 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------
@@ -43,7 +43,7 @@ :binary-type lu32 :initform 0 :map-binary-write (lambda (x type) - (declare (ignore x y)) + (declare (ignore x type)) (- (sizeof 'multiboot-header) 8))) (magic :accessor magic