[Git][cmucl/cmucl][rtoy-mmap-anon-control-and-binding-stacks] 2 commits: Fix merge mistake: Don't print break as int3.

[Raymond Toy]

Raymond Toy pushed to branch rtoy-mmap-anon-control-and-binding-stacks at cmucl / cmucl


Commits:
694331c1 by Raymond Toy at 2015-11-04T19:42:41Z
Fix merge mistake:  Don't print break as int3.

- - - - -
0fb5c699 by Raymond Toy at 2015-11-04T19:44:58Z
Define CONTROL_STACK_START and BINDING_STACK_START.

ppc currently only supports allocating the control stack and binding
stack at fixed addresses.  (This used to work, but something broke it
recently.  Until the ppc machine comes back, we're going to disable
that feature there.)

- - - - -


2 changed files:

- src/compiler/x86/insts.lisp
- src/lisp/ppc-validate.h


Changes:

=====================================
src/compiler/x86/insts.lisp
=====================================
--- a/src/compiler/x86/insts.lisp
+++ b/src/compiler/x86/insts.lisp
@@ -2105,7 +2105,6 @@
 (define-instruction break (segment code)
   (:declare (type (unsigned-byte 8) code))
   (:printer byte-imm ((op #b11001100)) '(:name :tab code)
-	    :print-name 'int3
 	    :control #'break-control)
   (:emitter
    (emit-byte segment #b11001100)


=====================================
src/lisp/ppc-validate.h
=====================================
--- a/src/lisp/ppc-validate.h
+++ b/src/lisp/ppc-validate.h
@@ -41,19 +41,13 @@
 #define STATIC_SPACE_START  	(0x10000000)
 #define STATIC_SPACE_SIZE   	(0x07ff8000)	/* 128 MB, almost */
 
-#if 0
 #define CONTROL_STACK_START 	(0x30000000)
-#endif
 #define CONTROL_STACK_SIZE  	(0x07ff8000)	/* 128 MB, almost */
-#if 0
 #define CONTROL_STACK_END       (CONTROL_STACK_START + control_stack_size)
-#endif
 
 #define SIGNAL_STACK_SIZE	SIGSTKSZ
 
-#if 0
 #define BINDING_STACK_START 	(0x38000000)
-#endif
 #define BINDING_STACK_SIZE  	(0x07ff8000)	/* 128 MB, almost */
 
 #if 0



View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/compare/138310f93edc558e3166c1a134e6ba26fcb1eaa6...0fb5c69944e2218b218a35ed3af023c06eea0eda
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cmucl-cvs/attachments/20151105/e60348b8/attachment.html>