[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