[movitz-cvs] CVS update: movitz/losp/muerte/more-macros.lisp
Frode Vatvedt Fjeld
ffjeld at common-lisp.net
Wed Sep 22 17:48:01 UTC 2004
Update of /project/movitz/cvsroot/movitz/losp/muerte
In directory common-lisp.net:/tmp/cvs-serv739
Modified Files:
more-macros.lisp
Log Message:
Removed dead code.
Date: Wed Sep 22 19:48:00 2004
Author: ffjeld
Index: movitz/losp/muerte/more-macros.lisp
diff -u movitz/losp/muerte/more-macros.lisp:1.19 movitz/losp/muerte/more-macros.lisp:1.20
--- movitz/losp/muerte/more-macros.lisp:1.19 Wed Sep 15 12:22:59 2004
+++ movitz/losp/muerte/more-macros.lisp Wed Sep 22 19:48:00 2004
@@ -10,7 +10,7 @@
;;;; Author: Frode Vatvedt Fjeld <frodef at acm.org>
;;;; Created at: Fri Jun 7 15:05:57 2002
;;;;
-;;;; $Id: more-macros.lisp,v 1.19 2004/09/15 10:22:59 ffjeld Exp $
+;;;; $Id: more-macros.lisp,v 1.20 2004/09/22 17:48:00 ffjeld Exp $
;;;;
;;;;------------------------------------------------------------------
@@ -340,16 +340,6 @@
(movitz::lu32
`(with-inline-assembly (:returns :untagged-fixnum-ecx)
(:locally (:movl (:edi (:edi-offset ,slot-name)) :ecx))))))))
-
-;;;(define-compiler-macro malloc-pointer-words (words)
-;;; `(with-inline-assembly (:returns :eax :type pointer)
-;;; (:compile-form (:result-mode :eax) ,words)
-;;; (:call-local-pf malloc-pointer-words)))
-;;;
-;;;(define-compiler-macro malloc-non-pointer-words (words)
-;;; `(with-inline-assembly (:returns :eax :type pointer)
-;;; (:compile-form (:result-mode :eax) ,words)
-;;; (:call-local-pf malloc-non-pointer-words)))
(define-compiler-macro read-time-stamp-counter ()
`(with-inline-assembly-case ()
More information about the Movitz-cvs
mailing list