Raymond Toy pushed to branch rtoy-fix-40-map-heap-higher at cmucl / cmucl

Commits: 48f8ebb9 by Raymond Toy at 2017-08-29T10:54:21-07:00 Add handler-bind to auto restart

Changing defconstant's signal an error. Add a handler-bind to restart and continue with the changed values.

- - - - - aba0bc5c by Raymond Toy at 2017-08-29T10:56:15-07:00 Rename to boot-2017-04-1.lisp

- - - - -

1 changed file:

- src/bootfiles/21b/boot-2017-04.lisp → src/bootfiles/21b/boot-2017-04-1.lisp

Changes:

===================================== src/bootfiles/21b/boot-2017-04.lisp → src/bootfiles/21b/boot-2017-04-1.lisp ===================================== --- a/src/bootfiles/21b/boot-2017-04.lisp +++ b/src/bootfiles/21b/boot-2017-04-1.lisp @@ -17,9 +17,12 @@ #x5f000000)

#+linux -(defconstant vm::target-foreign-linkage-space-start - (c:backend-foreign-linkage-space-start c::*target-backend*)) +(handler-bind + ((error (lambda (c) + (declare (ignore c)) + (invoke-restart 'continue)))) + (defconstant vm::target-foreign-linkage-space-start + (c:backend-foreign-linkage-space-start c::*target-backend*))

-#+linux -(defconstant vm::target-dynamic-space-start - #x60000000) + (defconstant vm::target-dynamic-space-start + #x60000000))

View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/compare/c40b7a6bd91ee60ec4e1fbbff...

--- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/compare/c40b7a6bd91ee60ec4e1fbbff... You're receiving this email because of your account on gitlab.common-lisp.net.