Update of /cvsroot/sbcl/sbcl/src/compiler/x86
In directory usw-pr-cvs1:/tmp/cvs-serv1348/src/compiler/x86
Modified Files:
insts.lisp parms.lisp
Log Message:
0.7.3.1:
finally getting to CLISP bootstrapping...
...merged CSR patch "more controversial fixes" from "Re: CLISP
compilation" sbcl-devel 2002-04-15 (which don't look
very controversial except for the **CURRENT-SEGMENT**
code, which is going to have to be fixed somehow and
for which this fix looks plausible)
...made comment fixes mostly related to CSR patch
...fixed "#+"-should-be-"#!+" typos in parms.lisp
Index: insts.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/compiler/x86/insts.lisp,v
retrieving revision 1.17
retrieving revision 1.18
diff -C2 -d -r1.17 -r1.18
*** insts.lisp 16 Jan 2002 15:40:15 -0000 1.17
--- insts.lisp 25 Apr 2002 19:26:55 -0000 1.18
***************
*** 20,23 ****
--- 20,25 ----
(deftype reg () '(unsigned-byte 3))
+
+ (defconstant +default-operand-size+ :dword)
(eval-when (#-sb-xc :compile-toplevel :load-toplevel :execute)
***************
*** 793,798 ****
(defconstant +operand-size-prefix-byte+ #b01100110)
-
- (defconstant +default-operand-size+ :dword)
(defun maybe-emit-operand-size-prefix (segment size)
--- 795,798 ----
Index: parms.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/compiler/x86/parms.lisp,v
retrieving revision 1.25
retrieving revision 1.26
diff -C2 -d -r1.25 -r1.26
*** parms.lisp 20 Jan 2002 18:31:24 -0000 1.25
--- parms.lisp 25 Apr 2002 19:26:55 -0000 1.26
***************
*** 166,177 ****
(defconstant control-stack-start
! #+freebsd #x40000000
! #+openbsd #x48000000)
(defconstant control-stack-end
! #+freebsd #x47fff000
! #+openbsd #x4ffff000)
(defconstant dynamic-space-start
! #+freebsd #x48000000
! #+openbsd #x50000000)
(defconstant dynamic-space-end #x88000000))
--- 166,177 ----
(defconstant control-stack-start
! #!+freebsd #x40000000
! #!+openbsd #x48000000)
(defconstant control-stack-end
! #!+freebsd #x47fff000
! #!+openbsd #x4ffff000)
(defconstant dynamic-space-start
! #!+freebsd #x48000000
! #!+openbsd #x50000000)
(defconstant dynamic-space-end #x88000000))
|