Raymond Toy pushed to branch master at cmucl / cmucl
Commits: 00ec87ed by Raymond Toy at 2016-05-21T12:06:42-07:00 Expand on some docstrings
Describe better the following:
sys::*runtime-features* register-lisp-feature register-lisp-runtime-feature
- - - - -
2 changed files:
- src/code/lispinit.lisp - src/code/sysmacs.lisp
Changes:
===================================== src/code/lispinit.lisp ===================================== --- a/src/code/lispinit.lisp +++ b/src/code/lispinit.lisp @@ -29,7 +29,7 @@ (export '(compiler-version scrub-control-stack *runtime-features*))
(defvar *runtime-features* nil - "Features affecting the runtime") + "Features affecting the runtime. These are written to internals.h.")
(in-package :extensions) (export '(quit *prompt*))
===================================== src/code/sysmacs.lisp ===================================== --- a/src/code/sysmacs.lisp +++ b/src/code/sysmacs.lisp @@ -20,12 +20,14 @@ register-lisp-feature register-lisp-runtime-feature))
(defmacro register-lisp-feature (feature) - "Register the feature as having influenced the CMUCL build process." + "Register the feature as having influenced the CMUCL build + process. Feature is added to *feature*" `(pushnew ,feature *features*))
(defmacro register-lisp-runtime-feature (feature) "Register the feature as having influenced the CMUCL build process, -and also the CMUCL C runtime." +and also the CMUCL C runtime. Feature is added to*features* and +sys::*runtime-features*." (let ((f (gensym))) `(progn (let ((,f ,feature))
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/00ec87ed626beaa99ae6c3ff17...