Function: EXTEND-ENVIRONMENT

Documentation

Create a new environment with all the bindings in NEW-ENVIRONMENT and ENVIRONMENT. Any bindings in NEW-ENVIRNOMENT shadow (on successive calls to LOOKUP-TAL-VARIABLE) other bindings currently present in ENVIRONMENT.

Source

(defun extend-environment (new-environment environment)
  "Create a new environment with all the bindings in NEW-ENVIRONMENT and ENVIRONMENT.

Any bindings in NEW-ENVIRNOMENT shadow (on successive calls to
LOOKUP-TAL-VARIABLE) other bindings currently present in
ENVIRONMENT."
  ;; return a new list containing all the binding-sets of
  ;; new-environment and then all the binding sets of environment.
  (append new-environment environment))