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...