[movitz-cvs] CVS update: movitz/losp/muerte/los-closette.lisp
Frode Vatvedt Fjeld
ffjeld at common-lisp.net
Thu Jul 8 18:53:52 UTC 2004
Update of /project/movitz/cvsroot/movitz/losp/muerte
In directory common-lisp.net:/tmp/cvs-serv25908
Modified Files:
los-closette.lisp
Log Message:
Removed references to the old movitz-vector class.
Date: Thu Jul 8 11:53:52 2004
Author: ffjeld
Index: movitz/losp/muerte/los-closette.lisp
diff -u movitz/losp/muerte/los-closette.lisp:1.11 movitz/losp/muerte/los-closette.lisp:1.12
--- movitz/losp/muerte/los-closette.lisp:1.11 Mon May 24 07:59:08 2004
+++ movitz/losp/muerte/los-closette.lisp Thu Jul 8 11:53:52 2004
@@ -10,7 +10,7 @@
;;;; Author: Frode Vatvedt Fjeld <frodef at acm.org>
;;;; Created at: Tue Jul 23 14:29:10 2002
;;;;
-;;;; $Id: los-closette.lisp,v 1.11 2004/05/24 14:59:08 ffjeld Exp $
+;;;; $Id: los-closette.lisp,v 1.12 2004/07/08 18:53:52 ffjeld Exp $
;;;;
;;;;------------------------------------------------------------------
@@ -871,7 +871,7 @@
(:compile-form (:result-mode :eax) instance)
(:movl (:eax ,(bt:slot-offset 'movitz::movitz-std-instance 'movitz::slots))
:eax)
- (:movl (:eax ,(+ (bt:slot-offset 'movitz::movitz-vector 'movitz::data)
+ (:movl (:eax ,(+ (bt:slot-offset 'movitz::movitz-basic-vector 'movitz::data)
(* location 4)))
:eax)
(:cmpl :eax ,(movitz::make-indirect-reference :edi (movitz::global-constant-offset 'unbound-value)))
More information about the Movitz-cvs
mailing list