X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fx86%2Fparms.lisp;h=6e343256ad7bc1fef3fda32d0dc493853c5caf28;hb=9be48f2a73ca5f4cc0848b8c0adad7127de10373;hp=81563da3e1e65aeed78a13c98e46efb67409d51a;hpb=a41c057bfe9d8b0b53d2765b8559f18327f28813;p=sbcl.git diff --git a/src/compiler/x86/parms.lisp b/src/compiler/x86/parms.lisp index 81563da..6e34325 100644 --- a/src/compiler/x86/parms.lisp +++ b/src/compiler/x86/parms.lisp @@ -35,9 +35,11 @@ ;;; addressable object (def!constant n-byte-bits 8) -;;; The size in bytes of the GENCGC pages. Should be a multiple of the -;;; architecture code size. -(def!constant gencgc-page-size 4096) +;;; The minimum immediate offset in a memory-referencing instruction. +(def!constant minimum-immediate-offset (- (expt 2 31))) + +;;; The maximum immediate offset in a memory-referencing instruction. +(def!constant maximum-immediate-offset (1- (expt 2 31))) (def!constant float-sign-shift 31) @@ -271,8 +273,7 @@ breakpoint fun-end-breakpoint single-step-around - single-step-before - #!+win32 context-restore) ;; HACK: The Win32 exception handling system does wrong things with this. + single-step-before) ;;; FIXME: It'd be nice to replace all the DEFENUMs with something like ;;; (WITH-DEF-ENUM (:START 8) ;;; (DEF-ENUM HALT-TRAP)