git clone 'https://github.com/lmj/global-vars.git'
Define efficient global variables in Common Lisp.
;; Similar to defparameter with regard to redefinitions (define-global-parameter -x- 3) ;; Similar to defvar with regard to redefinitions (define-global-var -y- 4) ;; ... (setf -x- 5) (setf -y- 6)
In Common Lisp, a special variable that is never dynamically bound
typically serves as a stand-in for a global variable. The
global-vars library provides true global variables that are
implemented by some compilers. An attempt to rebind a global variable
properly results in a compiler error. That is, a global variable
cannot be dynamically bound.
Global variables therefore allow us to communicate an intended usage that differs from special variables. Global variables are also more efficient than special variables, especially in the presence of threads.
Define a global variable with a compile-time value.
Subsequent redefinitions will not change the value (like
value argument is evaluated at compile-time. On SBCL, this
permits optimizations based upon the invariant that
name is always
value is evaluated at load time,
not compile time.
define-global-var except subsequent redefinitions will
update the value (like
value is evaluated at
load time, not compile time.
global-vars wraps the following implementation-specific features:
hcl:special-global, in particular
For these implementations, rebinding a global variable is a compilation error.
On other implementations, a global variable is implemented as a symbol
macro which expands to a
symbol-value form. Rebinding a global
variable will (unfortunately) not signal an error.
It is recommended to use a naming convention for global variables,
-foo-. This makes it clear that
(let ((-foo- 9)) ...) is a
mistake even if the compiler doesn't catch it.
James M. Lawrence mailto:email@example.com