Update of /cvsroot/sbcl/sbcl/src/assembly/mips
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1514/src/assembly/mips
Modified Files:
arith.lisp
Log Message:
0.9.3.56:
Comment fixes from THS (sbcl-devel 2005-08-16).
Index: arith.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/assembly/mips/arith.lisp,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- arith.lisp 14 Jul 2005 16:30:11 -0000 1.4
+++ arith.lisp 16 Aug 2005 12:40:31 -0000 1.5
@@ -1,6 +1,15 @@
(in-package "SB!VM")
+
+;;;; Addition and subtraction.
+
+;;; static-fun-offset returns the address of the raw_addr slot of
+;;; a static function's fdefn.
+
+;;; Note that there is only one use of static-fun-offset outside this
+;;; file (in genesis.lisp)
+
(define-assembly-routine (generic-+
(:cost 10)
(:return-style :full-call)
@@ -101,6 +110,10 @@
DONE)
+
+;;;; Multiplication
+
+
(define-assembly-routine (generic-*
(:cost 25)
(:return-style :full-call)
|